Libris Britannia 4/science library(b).zip/science library(b)/PROGRAMM/PASCAL/0635.ZIP/INCDEC.INC

Text File | 1987-07-25 | 129b | 10 lines

Procedure Inc(Var I:Integer);
Begin
I := I + 1;
End; {Inc}

Procedure Dec(Var I:Integer);
Begin
I := I - 1;
End; {Dec}